CD Ware Multimedia 1994 November/Cd Ware (Nro. 2) - Epimundo.iso/DOS/ED/PCKEY.ZIP/KEYSDOWN.SCR

Text File | 1993-05-25 | 18.9 KB | 1,101 lines

:keysdown.scr

if memory 1 = 4 goto cont_lkl
memory 1 = 4
memory 2 = 0

:cont_lkl
if memory 2 > 0 goto repeat_lesson2

goto start_lesson
:repeat_lesson
bkey r
bkey '

:start_lesson
start 2
clear 15

cursor 23 19
print 'Press any key to start lesson 5.
wait -
clear 19 19

clear 15
cursor 0 15
print 'Lessons 5 and 6 will concentrate on the HOME keys and the row below.
hkey a
fkey z
cursor 2 17
print 'Your left little finger over the A key, also presses the Z key. You move your
cursor 0 18
print 'finger backwards and slightly to the right, press Z and return your finger
cursor 0 19
print 'resting over A.

cursor 0 21
print 'Try moving your left little finger over the Z key, press it and return your
cursor 0 22
print 'finger back resting over the A key.

:wait_for_z
wait -
if key ! Z if key ! z goto wait_for_z

fkey a
hkey z

print ' Good. Now press the A key.

:wait_for_a
wait -
if key ! A if key ! a goto wait_for_a

bkey z
hkey a

print ' Good.
script - waitspc

clear 15
clear 15
cursor 0 15
print 'Now try a short test using the keys A and Z.

clear 18
cursor 19 18
print 'aaaa zzzz aaaa zzzz aazz aazz azaz azaz
cursor 0 21
print 'Remember you use your left little finger to press Z.
fkey a
hkey z
script - waitspc
bkey a
bkey z
script - dotest1

clear 15
cursor 0 15
print 'Now we shall learn about the keys S and X.
hkey s
fkey x
cursor 2 17
print 'Your left ring finger over the S key, also presses the X key. You move your
cursor 0 18
print 'finger backwards and slightly to the right, press X and return your finger
cursor 0 19
print 'resting over S.

cursor 0 21
print 'Try moving your left ring finger over the X key, press it and return your
cursor 0 22
print 'finger back resting over the S key.

:wait_for_x
wait -
if key ! X if key ! x goto wait_for_x

fkey s
hkey x

print ' Good. Now press the S key.

:wait_for_s
wait -
if key ! S if key ! s goto wait_for_s

bkey x
hkey s

print ' Good.
script - waitspc

clear 15
clear 15
cursor 0 15
print 'Now try a short test using the keys S and X.

clear 18
cursor 19 18
print 'ssss xxxx ssss xxxx ssxx ssxx sxsx sxsx
cursor 0 21
print 'Remember you use your left ring finger to press X.
fkey s
hkey x
script - waitspc
bkey s
bkey x
script - dotest1

clear 15
cursor 0 15
print 'Now we shall learn about the keys D and C.
hkey d
fkey c
cursor 2 17
print 'Your left middle finger over the D key, also presses the C key. You move your
cursor 0 18
print 'finger backwards and slightly to the right, press C and return your finger
cursor 0 19
print 'resting over D.

cursor 0 21
print 'Try moving your left middle finger over the C key, press it and return your
cursor 0 22
print 'finger back resting over the D key.

:wait_for_c
wait -
if key ! C if key ! c goto wait_for_c

fkey d
hkey c

print ' Good. Now press the D key.

:wait_for_d
wait -
if key ! D if key ! d goto wait_for_d

bkey c
hkey d

print ' Good.
script - waitspc

clear 15
clear 15
cursor 0 15
print 'Now try a short test using the keys D and C.

clear 18
cursor 19 18
print 'dddd cccc dddd cccc ddcc ddcc dcdc dcdc
cursor 0 21
print 'Remember you use your left middle finger to press C.
fkey d
hkey c
script - waitspc
bkey d
bkey c
script - dotest1

clear 15
cursor 0 15
print 'Now we shall learn about the keys F and V.
hkey f
fkey v
cursor 2 17
print 'Your left index finger over the F key, also presses the V key. You move your
cursor 0 18
print 'finger backwards and slightly to the right, press V and return your finger
cursor 0 19
print 'resting over F.

cursor 0 21
print 'Try moving your left index finger over the V key, press it and return your
cursor 0 22
print 'finger back resting over the F key.

:wait_for_v
wait -
if key ! V if key ! v goto wait_for_v

fkey f
hkey v

print ' Good. Now press the F key.

:wait_for_f
wait -
if key ! F if key ! f goto wait_for_f

bkey v
hkey f

print ' Good.
script - waitspc

clear 15
clear 15
cursor 0 15
print 'Now try a short test using the keys F and V.

clear 18
cursor 19 18
print 'ffff vvvv ffff vvvv ffvv ffvv fvfv fvfv
cursor 0 21
print 'Remember you use your left index finger to press V.
fkey f
hkey v
script - waitspc
bkey f
bkey v
script - dotest1

clear 15
cursor 0 15
print 'Now we shall learn about the keys J and M.
hkey j
fkey m
cursor 2 17
print 'Your right index finger over the J key, also presses the M key. You move your
cursor 0 18
print 'finger backwards and slightly to the right, press M and return your finger
cursor 0 19
print 'resting over J.

cursor 0 21
print 'Try moving your right index finger over the M key, press it and return your
cursor 0 22
print 'finger back resting over the J key.

:wait_for_m
wait -
if key ! M if key ! m goto wait_for_m

fkey j
hkey m

print ' Good. Now press the J key.

:wait_for_j
wait -
if key ! J if key ! j goto wait_for_j

bkey m
hkey j

print ' Good.
script - waitspc

clear 15
clear 15
cursor 0 15
print 'Now try a short test using the keys J and M.

clear 18
cursor 19 18
print 'jjjj mmmm jjjj mmmm jjmm jjmm jmjm jmjm
cursor 0 21
print 'Remember you use your right index finger to press M.
fkey j
hkey m
script - waitspc
bkey j
bkey m
script - dotest1

clear 15
cursor 0 15
print 'Now we shall learn about the keys K and ,
hkey k
fkey ,
cursor 2 17
print 'Your right middle finger over the K key, also presses the , key. You move your
cursor 0 18
print 'finger backwards and slightly to the right, press , and return your finger
cursor 0 19
print 'resting over K.

cursor 0 21
print 'Try moving your right middle finger over the , key, press it and return your
cursor 0 22
print 'finger back resting over the K key.

:wait_for_,
wait -
if key ! , goto wait_for_,

fkey k
hkey ,

print ' Good. Now press the K key.

:wait_for_k
wait -
if key ! K if key ! k goto wait_for_k

bkey ,
hkey k

print ' Good.
script - waitspc

clear 15
clear 15
cursor 0 15
print 'Now try a short test using the keys K and ,

clear 18
cursor 19 18
print 'kkkk ,,,, kkkk ,,,, kk,, kk,, k,k, k,k,
cursor 0 21
print 'Remember you use your right middle finger to press ,
fkey k
hkey ,
script - waitspc
bkey k
bkey ,
script - dotest1

clear 15
cursor 0 15
print 'Now we shall learn about the keys L and .
hkey l
fkey .
cursor 2 17
print 'Your right ring finger over the L key, also presses the . key. You move your
cursor 0 18
print 'finger backwards and slightly to the right, press . and return your finger
cursor 0 19
print 'resting over L.

cursor 0 21
print 'Try moving your right ring finger over the . key, press it and return your
cursor 0 22
print 'finger back resting over the L key.

:wait_for_.
wait -
if key ! . goto wait_for_.

fkey l
hkey .

print ' Good. Now press the L key.

:wait_for_l
wait -
if key ! L if key ! l goto wait_for_l

bkey .
hkey l

print ' Good.
script - waitspc

clear 15
clear 15
cursor 0 15
print 'Now try a short test using the keys L and .

clear 18
cursor 19 18
print 'llll .... llll .... ll.. ll.. l.l. l.l.
cursor 0 21
print 'Remember you use your right ring finger to press .
fkey l
hkey .
script - waitspc
bkey l
bkey .
script - dotest1

clear 15
cursor 0 15
print 'Now we shall learn about the keys ; and /.
hkey ;
fkey /
cursor 2 17
print 'Your right little finger over the ; key, also presses the / key. You move your
cursor 0 18
print 'finger backwards and slightly to the right, press / and return your finger
cursor 0 19
print 'resting over ;

cursor 0 21
print 'Try moving your right little finger over the / key, press it and return your
cursor 0 22
print 'finger back resting over the ; key.

:wait_for_/
wait -
if key ! / goto wait_for_/

fkey ;
hkey /

print ' Good. Now press the ; key.

:wait_for_;
wait -
if key ! ; goto wait_for_;

bkey /
hkey ;

print ' Good.
script - waitspc

clear 15
clear 15
cursor 0 15
print 'Now try a short test using the keys ; and /.

clear 18
cursor 19 18
print ';;;; //// ;;;; //// ;;// ;;// ;/;/ ;/;/
cursor 0 21
print 'Remember you use your right little finger to press /.
fkey ;
hkey /
script - waitspc
bkey ;
bkey /
script - dotest1

script - progress

clear 15
cursor 0 15
print 'Now we will practice with the keys you have just learnt and the HOME keys.

clear 18
cursor 9 18
print 'vvvv ffff mmmm jjjj ffff vvvv jjjj mmmm ffjj vvmm ffvv jjmm
cursor 0 21
print 'Remember your index fingers rest over F and J.
hkey f
fkey g
fkey v
fkey m
fkey h
hkey j
script - waitspc
bkey f
bkey g
bkey v
bkey h
bkey m
bkey j
script - dotest2

cursor 9 18
print 'vvvv ffgg hhjj mmmm vvmm ffjj mmvv mjmj vfvf vmvm vjvj fmfm
script - dotest2

cursor 9 18
print 'fvmg gvmf vmgh fmgh fvmj jvmf jfhg jvfm fhgm jghv hgfj mgvh
script - dotest2

script - progress

clear 18
cursor 9 18
print 'cccc ddkk ,,,, cc,, dd,, kkcc ,,cc dd,, ddcc ccc, ,,,c c,,c
cursor 0 21
print 'Remember your middle fingers rest over D and K.
hkey d
fkey c
fkey ,
hkey k
script - waitspc
bkey d
bkey c
bkey ,
bkey k
script - dotest2

cursor 9 18
print ',,,c ,ccc ccc, d,,, kkdd ddcc cc,, ,,kk dc,k k,cd kccd d,,k
script - dotest2

cursor 9 18
print 'k,k, dcdc dck, k,dc d,kc kcd, dk,, kdcc ,kkc d,,k cdd, kccd
script - dotest2

script - progress

clear 18
cursor 9 18
print 'xxxx ssll .... xx.. ss.. llxx ..xx ss.. ssxx xxx. ...x x..x
cursor 0 21
print 'Remember your ring fingers rest over S and L.
hkey s
fkey x
fkey .
hkey l
script - waitspc
bkey s
bkey x
bkey .
bkey l
script - dotest2

cursor 9 18
print '...x .xxx xxx. s... llss ssxx xx.. ..ll sx.l l.xs lxxs s..l
script - dotest2

cursor 9 18
print 'l.l. sxsx sxl. l.sx s.lx lxs. sl.. lsxx .llx s..l xss. lxxs
script - dotest2

script - progress

clear 18
cursor 9 18
print 'zzzz aa;; //// zz// aa// ;;zz //zz aa// aazz zzz/ ///z z//z
cursor 0 21
print 'Remember your little fingers rest over A and ;
hkey a
fkey z
fkey /
hkey ;
script - waitspc
bkey a
bkey z
bkey /
bkey ;
script - dotest2

cursor 9 18
print '///z /zzz zzz/ a/// ;;aa aazz zz// //;; az/; ;/za ;zza a//;
script - dotest2

cursor 9 18
print ';/;/ azaz az;/ ;/az a/;z ;za/ a;// ;azz /;;z a//; zaa/ ;zza
script - dotest2

script - progress

clear 15
cursor 0 15
print 'Now we will practice with Z X C V M , . / and A S D F G H J K L ;

clear 18
cursor 9 18
print 'az sx dc fv jm k, l. ;/ azaz sxsx dcdc fvfv jmjm k,k, l.l. ;/;/
cursor 0 21
print 'Remember your fingers rest on the HOME keys.
hkey a
fkey z
hkey s
fkey x
hkey d
fkey c
hkey f
fkey v
fkey g
fkey h
fkey m
hkey j
fkey ,
hkey k
fkey .
hkey l
fkey /
hkey ;
script - waitspc
bkey a
bkey z
bkey s
bkey x
bkey d
bkey c
bkey f
bkey v
bkey g
bkey h
bkey m

bkey j
bkey ,
bkey k
bkey .
bkey l
bkey /
bkey ;
script - dotest2

clear 18 18
cursor 9 18
print 'a x f h d v f h / j , l s c c g k v j d ; s z x j g a v j g
script - dotest2

clear 18 18
cursor 9 18
print 'aza vfv k,, hmv g,g jjv fvf xsc d/l m.m vxh gsa hfh zsz cck
script - dotest2

clear 18 18
cursor 9 18
print 'lack, asks, flag. lama, cask, dam. gag hall jazz zag chasm.
script - dotest2

clear 18 18
cursor 9 18
print 'jack has a gag, lacks a mag, had a fag. a gag, a mag, a fag.
script - dotest2

script - progress

script - repeat
if key = R goto repeat_lesson
if key = r goto repeat_lesson

memory 2 = 1

clear
cursor 51 7
print '5.
script - save
if key = S goto exit
if key = s goto exit

clear
keyboard

:repeat_lesson2
if memory 2 > 1 goto exit
start 2
clear 15
cursor 23 19
print 'Press any key to start lesson 6.
wait -
clear 19 19

fkey f
hkey b
hkey n
fkey j
cursor 2 16
print 'The B and N keys are a little bit more difficult to get used to. Like the
cursor 0 17
print 'T and Y keys, B and N are pressed by your index fingers.

cursor 2 18
print 'Your left index finger moves from the F key in a rightward diagonal direction
cursor 0 19
print 'over B and your right index finger moves in a leftward diagonal direction over
cursor 0 20
print 'the N key.

cursor 2 21
print 'These keys are awkward and take a while to get used to, so we will dedicate
cursor 0 22
print 'this lesson to B and N gradually including the HOME keys.

script - waitspc

hkey f
fkey b
bkey n
bkey j
clear 16
cursor 2 16
print 'Try moving your left index finger over the B key, press it and return your
cursor 0 17
print 'finger back resting over the F key.

:wait_for_b
wait -
if key ! B if key ! b goto wait_for_b

fkey f
hkey b

cursor 2 19
print 'Good. Now press the F key.

:wait_for_f
wait -
if key ! F if key ! f goto wait_for_f

bkey b
hkey f

print ' Good.
script - waitspc

bkey f

clear 15
cursor 2 16
print 'Try moving your right index finger over the N key, press it and move your
cursor 0 17
print 'finger back over the J key.

hkey j
fkey n

:wait_for_n
wait -
if key ! N if key ! n goto wait_for_n

fkey j
hkey n

cursor 2 19
print 'Good. Now press the J key.

:wait_for_j
wait -
if key ! J if key ! j goto wait_for_j

bkey n
hkey j

print ' Good.
script - waitspc

clear 15
cursor 0 15
print 'Now we will try a short test using the keys F B and J N.

cursor 19 18
print 'bbbb ffff nnnn jjjj nnnn jjjj bbbb ffff
cursor 0 21
print 'Remember your index fingers rest over F and J.
hkey f
hkey b
hkey n
script - waitspc
bkey f
bkey b
bkey n
bkey j
script - dotest1

cursor 19 18
print 'bbbb ffff bbff bbff nnnn jjjj nnjj nnjj
script - dotest1

cursor 19 18
print 'bbbb nnnn bbnn bbnn bfff jnnn bbjj nnff
script - dotest1

cursor 19 18
print 'b b b b n n n n bn bn bf bf nj nj nb nb
script - dotest1

cursor 19 18
print 'bfj bfj njf njf njnj bnbn fbfb bnbn nbn
script - dotest1

script - progress

clear 15
cursor 0 15
print 'Now we will add G and H.

cursor 19 18
print 'bbbb gggg jjjj nnnn hhhh ffff bbgg nnhh
cursor 0 21
print 'You should only be using your index fingers to press these keys.
fkey f
hkey g
fkey b
fkey n
hkey h
fkey j
script - waitspc
bkey f
bkey g
bkey b
bkey n
bkey h
bkey j
script - dotest1

cursor 19 18
print 'ggbb hhnn bbnn jjff nnbb ffjj fbnj jhgf
script - dotest1

cursor 19 18
print 'bbnn bnbn bbff bfbf nnjj njnj gbbn hnnb
script - dotest1

script - progress

clear 15
cursor 0 15
print 'Now we will add V and M.

cursor 9 18
print 'vvvv bbbb nnnn mmmm nnnn vvvv mmmm bbbb vvvv nnnn bbbb mmmm
cursor 0 21
print 'Your index fingers rest over F and J when they are not being used.
fkey f
hkey v
fkey g
fkey b
fkey n
fkey h
hkey m
fkey j
script - waitspc
bkey f
bkey v
bkey g
bkey b
bkey n
bkey h
bkey m
bkey j
script - dotest2

clear 18 18
cursor 9 18
print 'vvff bbff mmjj nnjj bbvv nnmm bbgg nnhh nhjn bgfb bf bf nj nj
script - dotest2

clear 18 18
cursor 9 18
print 'nvhg bmgg nvhh vfbg mjnh bfbf njnj bfgf njhj vmff vmff mvgh
script - dotest2

script - progress

clear 15
cursor 0 15
print 'Now we will add the keys C D and , K.

cursor 9 18
print 'cccc dddd bbbb ffff ,,,, kkkk nnnn jjjj cccc bbbb ,,,, nnnn
cursor 0 21
print 'You use your middle fingers to press C D and , K.
hkey c
hkey d
fkey f
fkey v
fkey g
fkey b
fkey n
fkey h
fkey m
fkey j
hkey ,
hkey k
script - waitspc
bkey c
bkey d
bkey f
bkey v
bkey g
bkey b
bkey n
bkey h
bkey m
bkey j
bkey ,
bkey k
script - dotest2

clear 18 18
cursor 9 18
print 'bbbb dddd nnnn cccc nnnn kkkk bbbb ,,,, ccbb nndd ,,nn bbkk
script - dotest2

clear 18 18
cursor 9 18
print 'bbcc nn,, ccbb ,,nn nncc bb,, ,,bb ccnn cbcb cncn ,n,n ,b,b
script - dotest2

clear 18 18
cursor 9 18
print 'bbdd nnkk dcbb k,nn cdbb ,knn cbcd ,n,k cn,k ,bcd bcbd n,nk
script - dotest2

clear 18 18
cursor 9 18
print 'cdbf fbdc ,knj jnk, cbfd ,njk cvbn ,mnb cbgh ,mhg bbcg nn,h
script - dotest2

script - progress

clear 15
cursor 0 15
print 'Now we will add the keys X S and . L.

cursor 9 18
print 'xxxx ssss bbbb dddd .... llll nnnn kkkk nnnn ssss bbbb llll
cursor 0 21
print 'You use your ring fingers to press X S and . L.
hkey x
hkey s
fkey c
fkey d
fkey f
fkey v
fkey g
fkey b
fkey n
fkey h
fkey m
fkey j
fkey ,
fkey k
hkey .
hkey l
script - waitspc
bkey x
bkey s
bkey c
bkey d
bkey f
bkey v
bkey g
bkey b
bkey n
bkey h
bkey m
bkey j
bkey ,
bkey k
bkey .
bkey l
script - dotest2

clear 18 18
cursor 9 18
print 'ssss nnnn dddd bbbb xxxx nnnn llll bbbb kkkk nnnn .... bbbb
script - dotest2

clear 18 18
cursor 9 18
print 'xxxx bbbb xxbb ssbb nnss nnxx .... nnnn ..nn llnn bbll bb..
script - dotest2

clear 18 18
cursor 9 18
print 's j b f c k , . m v d l x h s g n ; fb ls gn v, xf gx cv .m
script - dotest2

clear 18 18
cursor 9 18
print 'jgh ,kc .mv scv fbc s.l nkj nkf sxl ,bs bbl mhm fvn xcd gnk
script - dotest2

clear 18 18
cursor 9 18
print 'xbsb cbdn .nln ,nkb sbxn ln.b fbnx gbsn jnb. hnlb gbgx hnh.
script - dotest2

script - progress

clear 15
cursor 0 15
print 'Now we will use the keys Z X C V B  N M , . /  A S D F G and H J K L ;

cursor 9 18
print 'zzzz bbbb xxxx nnnn //// nnnn .... bbbb aaaa nnnn ;;;; bbbb
cursor 0 21
print 'Remember your fingers rest on the HOME keys.
fkey z
hkey a
fkey x
hkey s
fkey c
hkey d
hkey f
fkey v
fkey g
fkey b
fkey n
fkey h
fkey m
hkey j
fkey ,
hkey k
fkey .
hkey l
fkey /
hkey ;
script - waitspc
bkey z
bkey a
bkey x
bkey s
bkey c
bkey d
bkey f
bkey v
bkey g
bkey b
bkey n
bkey h
bkey m
bkey j
bkey ,
bkey k
bkey .
bkey l
bkey /
bkey ;
script - dotest2

clear 18 18
cursor 9 18
print 'bbb fff jjj nnn ggg fff bbb xxx sss bbb ddd nnn vvv fff ;;;
script - dotest2

clear 18 18
cursor 9 18
print 'nnn jjj fff bbb hhh jjj nnn ... lll nnn kkk bbb mmm jjj aaa
script - dotest2

clear 18 18
cursor 9 18
print 'a x f h d v b h / j , l s c c g k n j b ; s z x j g a n j g
script - dotest2

clear 18 18
cursor 9 18
print 'l / k g c v b m f s z a , . j d a z s / n v g x h m g n a /
script - dotest2

clear 18 18
cursor 9 18
print 'as za cv xc /l k, nj hn jb vd zf kj fn bg sx x/ sh jj n, cc
script - dotest2

clear 18 18
cursor 9 18
print 'zbz afa gsg bfb cbc vfc fga abf /fz z;f sxs snz kfn fbz bfn
script - dotest2

clear 18 18
cursor 9 18
print 'aza nfn k,, bbv g,g jjb fvf xsc d/l m.m vnh gsn hfh zsz cck
script - dotest2

clear 18 18
cursor 9 18
print 'aza bbv cck,, d fvf,g g gsn hfh jjb/k l.m m nfn vnh xsc zsz
script - dotest2

clear 18 18
cursor 9 18
print 'zaz/b lh;dd xnzkz njnbf mn,;/ mbnaz ssavn nhbjj babng .dx.n
script - dotest2

clear 18 18
cursor 9 18
print 'zax xsc cdv vfb bgf /;. .l, ,km mjn nhj /hcx; l.bs .f lcbbcvs
script - dotest2

clear 18 18
cursor 9 18
print 'jam and bananas and jaffas; vans and jags, hands and lands.
script - dotest2

script - progress

script - repeat
if key = R goto repeat_lesson2
if key = r goto repeat_lesson2

memory 2 = 2

clear
cursor 51 7
print '6.
script save

if key ! C if key ! c goto exit
clear
keyboard

:exit